object EntryEditorForm: TEntryEditorForm
  Left = 76
  Top = 105
  BorderStyle = bsDialog
  ClientHeight = 134
  ClientWidth = 442
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 1
    Top = 0
    Width = 245
    Height = 133
    Caption = 'Diary Entry Details'
    TabOrder = 0
    object Label3: TLabel
      Left = 12
      Top = 56
      Width = 31
      Height = 13
      Caption = 'Event:'
    end
    object Label4: TLabel
      Left = 12
      Top = 80
      Width = 30
      Height = 13
      Caption = 'Place:'
    end
    object Label5: TLabel
      Left = 8
      Top = 104
      Width = 33
      Height = 13
      Caption = 'Catgry:'
    end
    object Bevel1: TBevel
      Left = 9
      Top = 45
      Width = 229
      Height = 2
    end
    object Time1Panel: TPanel
      Left = 66
      Top = 16
      Width = 46
      Height = 23
      Hint = 'Time 1 (From) / Click To Clear'
      BorderStyle = bsSingle
      Color = clWhite
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = Time1PanelClick
    end
    object Time2Panel: TPanel
      Left = 192
      Top = 16
      Width = 46
      Height = 23
      Hint = 'Time 2 (To) / Click To Clear'
      BorderStyle = bsSingle
      Color = clWhite
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = Time2PanelClick
    end
    object EventListbtn: TBitBtn
      Left = 207
      Top = 52
      Width = 28
      Height = 21
      Hint = 'Select Event'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = EventListbtnClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500000000000
        055557777777777775F508888888888880557F5FFFFFFFFFF75F080000000000
        88057577777777775F755080FFFFFF05088057F7FFFFFF7575F70000000000F0
        F08077777777775757F70FFFFFFFFF0F008075F5FF5FF57577F750F00F00FFF0
        F08057F775775557F7F750FFFFFFFFF0F08057FF5555555757F7000FFFFFFFFF
        0000777FF5FFFFF577770900F00000F000907F775777775777F7090FFFFFFFFF
        00907F7F555555557757000FFFFFFFFF0F00777F5FFF5FF57F77550F000F00FF
        0F05557F777577557F7F550FFFFFFFFF0005557F555FFFFF7775550FFF000000
        05555575FF777777755555500055555555555557775555555555}
      NumGlyphs = 2
    end
    object PlaceListbtn: TBitBtn
      Left = 207
      Top = 76
      Width = 28
      Height = 21
      Hint = 'Select Place'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      OnClick = PlaceListbtnClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500000000000
        055557777777777775F508888888888880557F5FFFFFFFFFF75F080000000000
        88057577777777775F755080FFFFFF05088057F7FFFFFF7575F70000000000F0
        F08077777777775757F70FFFFFFFFF0F008075F5FF5FF57577F750F00F00FFF0
        F08057F775775557F7F750FFFFFFFFF0F08057FF5555555757F7000FFFFFFFFF
        0000777FF5FFFFF577770900F00000F000907F775777775777F7090FFFFFFFFF
        00907F7F555555557757000FFFFFFFFF0F00777F5FFF5FF57F77550F000F00FF
        0F05557F777577557F7F550FFFFFFFFF0005557F555FFFFF7775550FFF000000
        05555575FF777777755555500055555555555557775555555555}
      NumGlyphs = 2
    end
    object CatPanel: TPanel
      Left = 53
      Top = 100
      Width = 155
      Height = 21
      Alignment = taLeftJustify
      BevelInner = bvLowered
      BevelOuter = bvNone
      BorderStyle = bsSingle
      Color = clWhite
      Ctl3D = True
      ParentCtl3D = False
      TabOrder = 4
    end
    object CatListbtn: TBitBtn
      Left = 207
      Top = 100
      Width = 28
      Height = 21
      Hint = 'Select Category'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      OnClick = CatListbtnClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500000000000
        055557777777777775F508888888888880557F5FFFFFFFFFF75F080000000000
        88057577777777775F755080FFFFFF05088057F7FFFFFF7575F70000000000F0
        F08077777777775757F70FFFFFFFFF0F008075F5FF5FF57577F750F00F00FFF0
        F08057F775775557F7F750FFFFFFFFF0F08057FF5555555757F7000FFFFFFFFF
        0000777FF5FFFFF577770900F00000F000907F775777775777F7090FFFFFFFFF
        00907F7F555555557757000FFFFFFFFF0F00777F5FFF5FF57F77550F000F00FF
        0F05557F777577557F7F550FFFFFFFFF0005557F555FFFFF7775550FFF000000
        05555575FF777777755555500055555555555557775555555555}
      NumGlyphs = 2
    end
    object EventEdit: TEdit
      Left = 54
      Top = 52
      Width = 154
      Height = 21
      AutoSize = False
      Color = clWhite
      Ctl3D = True
      ParentCtl3D = False
      TabOrder = 6
      OnChange = EventEditChange
      OnExit = EventEditExit
    end
    object PlaceEdit: TEdit
      Left = 54
      Top = 76
      Width = 154
      Height = 21
      AutoSize = False
      Color = clWhite
      Ctl3D = True
      ParentCtl3D = False
      TabOrder = 7
      OnChange = PlaceEditChange
      OnExit = PlaceEditExit
    end
    object Frombtn: TBitBtn
      Left = 8
      Top = 16
      Width = 59
      Height = 22
      Hint = 'Select First Time Field'
      Caption = 'From:'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 8
      OnClick = FrombtnClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333000003333333333F77777FFF333333009999900
        3333333777777777FF33330998FFF899033333777333F3777FF33099FFFCFFF9
        903337773337333777F3309FFFFFFFCF9033377333F3337377FF098FF0FFFFFF
        890377F3373F3333377F09FFFF0FFFFFF90377F3F373FFFFF77F09FCFFF90000
        F90377F733377777377F09FFFFFFFFFFF90377F333333333377F098FFFFFFFFF
        890377FF3F33333F3773309FCFFFFFCF9033377F7333F37377F33099FFFCFFF9
        90333777FF37F3377733330998FCF899033333777FF7FF777333333009999900
        3333333777777777333333333000003333333333377777333333}
      Layout = blGlyphRight
      NumGlyphs = 2
    end
    object BitBtn3: TBitBtn
      Left = 134
      Top = 16
      Width = 59
      Height = 22
      Hint = 'Select Second Time Field'
      Caption = 'Until:'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 9
      OnClick = BitBtn3Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333000003333333333F77777FFF333333009999900
        3333333777777777FF33330998FFF899033333777333F3777FF33099FFFCFFF9
        903337773337333777F3309FFFFFFFCF9033377333F3337377FF098FF0FFFFFF
        890377F3373F3333377F09FFFF0FFFFFF90377F3F373FFFFF77F09FCFFF90000
        F90377F733377777377F09FFFFFFFFFFF90377F333333333377F098FFFFFFFFF
        890377FF3F33333F3773309FCFFFFFCF9033377F7333F37377F33099FFFCFFF9
        90333777FF37F3377733330998FCF899033333777FF7FF777333333009999900
        3333333777777777333333333000003333333333377777333333}
      Layout = blGlyphRight
      NumGlyphs = 2
    end
  end
  object GroupBox2: TGroupBox
    Left = 249
    Top = 0
    Width = 122
    Height = 133
    Caption = 'Diary Text'
    TabOrder = 1
    object DiaryText: TMemo
      Left = 7
      Top = 15
      Width = 108
      Height = 112
      TabOrder = 0
      OnChange = DiaryTextChange
    end
  end
  object BitBtn1: TBitBtn
    Left = 375
    Top = 4
    Width = 67
    Height = 25
    TabOrder = 2
    Kind = bkOK
  end
  object BitBtn2: TBitBtn
    Left = 375
    Top = 31
    Width = 67
    Height = 25
    TabOrder = 3
    Kind = bkCancel
  end
  object Helpbtn: TBitBtn
    Left = 375
    Top = 66
    Width = 67
    Height = 25
    TabOrder = 4
    OnClick = HelpbtnClick
    Kind = bkHelp
  end
end